home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d10 / mailfile.arc / SEND < prev   
Encoding:
Text File  |  1991-03-20  |  584 b   |  22 lines
  1. if exist pcbstuff.kbd del pcbstuff.kbd >NUL
  2. l:\mailfile\send %PCBDAT% l:\mailfile\flatfile.dat
  3. if errorlevel 5 goto nouser
  4. if errorlevel 4 goto pcbdoor
  5. if errorlevel 2 goto args
  6. if errorlevel 1 pcboard
  7.   echo File sent to User.>pcbdoor.txt
  8.   goto end
  9. :pcboard
  10.   echo Could not open PCBOARD.SYS>pcbdoor.txt
  11.   goto end
  12. :args
  13.   echo Not enough arguments!>pcbdoor.txt
  14.   goto end
  15. :pcbdoor
  16.   echo Could not find the PCBDOOR variable!>pcbdoor.txt
  17.   goto end
  18. :nouser
  19.   echo The User which the file is address to is not a member of this bbs>pcbdoor.txt
  20. :end
  21. L:\pcb\board
  22.